home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / CRESC / Variations / gen-consecutive < prev    next >
Text File  |  1996-12-31  |  1KB  |  24 lines

  1. gen-consecutive number operation symbol-pattern &optional how seed
  2.  
  3. This function enables the generation of a sequence of consecutive variants as the result of an operation being carried out on a single master symbol-pattern. It is one of a pair of functions enabling evolving and consecutive proecessing or generation.
  4.  
  5. (gen-evolve 3 '(gen-random nil 8 x) '(a b c d e f g h) :list 0.12)
  6. --> ((a b c d e f g h) (d a c g a d c c) (a a c g c d c d) 
  7.      (a a a c a c d a))
  8.  
  9. (gen-consecutive 3 '(gen-random nil 8 x)
  10.                    '(a b c d e f g h) :list 0.12)
  11. --> ((a b c d e f g h) (d a c g a d c c) (e b c d g f c a) 
  12.      (b a b g a e f a))
  13.  
  14. The operation can be any function expression with or without a parameter. The list must be quoted and the parameter x MUST be used to represent the symbol-pattern.
  15.  
  16. If the keyword :list is used the consecutive generations are contained in separate lists. If omited, as above, they are appended.
  17.  
  18. (gen-consecutive 3 '(change-order nil x) 
  19.                    '(a b c d e f g) 0.13)
  20.  
  21. --> (a b c d e f g e b c d a f g f b c d e a g a b c f e d g)
  22.  
  23. Where randomization in an operation is necessary but the output needs to be recalled an optional random seed can be set.
  24.